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801 1 <textBox xpos="225" ypos="643.252" width="365.7266" height="21 .2385" 

2 color="None" canEdit="true" zpos="0" numCols="1" angle="0" 

3 frameColor="Black" runaroundleft="15" runaroundright="6" 

4 runaroundtop-T runaroundbottom="6" runaroundtype-"' frameWidth-'0"> 

5 <textProperties/> 

8Q2 6 <textRange font="Times New Roman" size="9" color="heidelberg"> 

7 <style name="Plain"/> 

8 <text>The 9200 is the first product from the ABC/XYZ 

9 collaboration. </text> 

802 10 </textRange> 
11 </textBox> 
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[<command>]: 

<parameter>-'<value>" 
[<command>]: 

<parameter>= ,, <value> u 



[<end command>] 
[<end command>] 
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// load CW document into memory 
[load file]: 

file-'cwDocument.xmr 
refname-'cwDoc" 

[import XML]: 

xml-'[Action.cwDoc]" 
datatree= M cwDataTree" 

// find ail text in XML hierarchy with a unique identifier for the textbox it resides in 
[search for elements in XML datatree]: 

datatree="[Action.cwDataTree]" 

resuitList="textList" 

narrowSearch-'eiement type- text' and 1st gen. parent element name='text ,M 
extractElementData="3rd gen. parent attribute 'zpos 1 to 'textboxld 1 and this element's value to 'text'" 

// loop through the resulting list of text elements and write the actual text to a file specific to the enclosing textbox 
[for each item in datalist]: 

dataIist="[Action:textListr 
item="textltem" 
// write the text to the appropriate file 
[export to file]: 

dataTo Write="[Action .textltem . text]" 
filename="'textbox t + [Action. textltem. textboxld] + '.txt ,M 
append-'true" 

[end for each item in datalist] 
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